1 DIMN(63,2)
2 BASE=1072
3 FORT=0TO63
4 N(T,1)=INT(BASE/256)
5 N(T,2)=BASE-N(T,1)*256
6 BASE=BASE+BASE*.0595
7 NEXT T
10 SID=54272
20 POKESID+24,15
30 POKESID+6,80
40 A=PEEK(197):PRINT"[147]":PRINT"PRESS SOME KEYS PLEASE"
50 IF A=64THENGOTO40
60 POKESID+1,N(A,1)
65 POKESID+0,N(A,2)
70 POKESID+4,33
80 GOTO40